object frm_PlanCarregamento: Tfrm_PlanCarregamento
  Left = 26
  Top = 130
  Width = 755
  Height = 417
  BorderIcons = []
  Caption = 'Planilha para Carregamento'
  Color = clBtnFace
  Font.Charset = DEFAULT_CHARSET
  Font.Color = clWindowText
  Font.Height = -11
  Font.Name = 'MS Sans Serif'
  Font.Style = [fsBold]
  OldCreateOrder = False
  WindowState = wsMaximized
  OnActivate = FormActivate
  OnClose = FormClose
  OnCreate = FormCreate
  PixelsPerInch = 96
  TextHeight = 13
  object Panel1: TPanel
    Left = 0
    Top = 0
    Width = 747
    Height = 37
    Align = alTop
    TabOrder = 0
    object Label1: TLabel
      Left = 10
      Top = 10
      Width = 132
      Height = 13
      Caption = 'Data do Carregamento:'
    end
    object edData: TDateEdit
      Left = 146
      Top = 8
      Width = 121
      Height = 21
      NumGlyphs = 2
      YearDigits = dyFour
      TabOrder = 0
      OnExit = edDataExit
    end
  end
  object pnlRepresentante: TPanel
    Left = 0
    Top = 37
    Width = 747
    Height = 140
    Align = alTop
    ParentShowHint = False
    ShowHint = True
    TabOrder = 1
    object dbRep: TDBGrid
      Left = 1
      Top = 1
      Width = 720
      Height = 138
      Hint = 'Clique 2 vezes p/ selecionar o representante'
      Align = alClient
      DataSource = dtsrcRep
      ReadOnly = True
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = [fsBold]
      OnDblClick = dbRepDblClick
      Columns = <
        item
          Expanded = False
          FieldName = 'Cod'
          Title.Caption = 'C'#243'digo'
          Width = 48
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Nome'
          Visible = True
        end>
    end
    object pnlRep: TPanel
      Left = 3
      Top = 2
      Width = 770
      Height = 37
      Font.Charset = DEFAULT_CHARSET
      Font.Color = clTeal
      Font.Height = -24
      Font.Name = 'MS Sans Serif'
      Font.Style = [fsBold]
      ParentFont = False
      TabOrder = 1
      Visible = False
    end
    object Panel2: TPanel
      Left = 721
      Top = 1
      Width = 25
      Height = 138
      Align = alRight
      BevelOuter = bvNone
      TabOrder = 2
      object bMax: TSpeedButton
        Left = 3
        Top = 23
        Width = 19
        Height = 19
        Flat = True
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333303333
          333333333337F33333333333333033333333333333373F333333333333090333
          33333333337F7F33333333333309033333333333337373F33333333330999033
          3333333337F337F33333333330999033333333333733373F3333333309999903
          333333337F33337F33333333099999033333333373333373F333333099999990
          33333337FFFF3FF7F33333300009000033333337777F77773333333333090333
          33333333337F7F33333333333309033333333333337F7F333333333333090333
          33333333337F7F33333333333309033333333333337F7F333333333333090333
          33333333337F7F33333333333300033333333333337773333333}
        NumGlyphs = 2
        OnClick = bMaxClick
      end
      object bMin: TSpeedButton
        Left = 3
        Top = 3
        Width = 19
        Height = 19
        Glyph.Data = {
          76010000424D7601000000000000760000002800000020000000100000000100
          04000000000000010000120B0000120B00001000000000000000000000000000
          800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
          FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000333
          3333333333777F33333333333309033333333333337F7F333333333333090333
          33333333337F7F33333333333309033333333333337F7F333333333333090333
          33333333337F7F33333333333309033333333333FF7F7FFFF333333000090000
          3333333777737777F333333099999990333333373F3333373333333309999903
          333333337F33337F33333333099999033333333373F333733333333330999033
          3333333337F337F3333333333099903333333333373F37333333333333090333
          33333333337F7F33333333333309033333333333337373333333333333303333
          333333333337F333333333333330333333333333333733333333}
        NumGlyphs = 2
        OnClick = bMinClick
      end
    end
  end
  object Panel4: TPanel
    Left = 0
    Top = 330
    Width = 747
    Height = 41
    Align = alBottom
    TabOrder = 2
    object bConfirma: TBitBtn
      Left = 8
      Top = 8
      Width = 110
      Height = 25
      Caption = '&Confirmar'
      TabOrder = 0
      OnClick = bConfirmaClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00555555555555
        555555555555555555555555555555555555555555FF55555555555559055555
        55555555577FF5555555555599905555555555557777F5555555555599905555
        555555557777FF5555555559999905555555555777777F555555559999990555
        5555557777777FF5555557990599905555555777757777F55555790555599055
        55557775555777FF5555555555599905555555555557777F5555555555559905
        555555555555777FF5555555555559905555555555555777FF55555555555579
        05555555555555777FF5555555555557905555555555555777FF555555555555
        5990555555555555577755555555555555555555555555555555}
      NumGlyphs = 2
    end
    object bExcluir: TBitBtn
      Left = 176
      Top = 8
      Width = 110
      Height = 25
      Caption = '&Eliminar'
      Enabled = False
      TabOrder = 1
      OnClick = bExcluirClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333000000000
        3333333777777777F3333330F777777033333337F3F3F3F7F3333330F0808070
        33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
        33333337F7F7F7F7F3333330F080707033333337F7F7F7F7F3333330F0808070
        333333F7F7F7F7F7F3F33030F080707030333737F7F7F7F7F7333300F0808070
        03333377F7F7F7F773333330F080707033333337F7F7F7F7F333333070707070
        33333337F7F7F7F7FF3333000000000003333377777777777F33330F88877777
        0333337FFFFFFFFF7F3333000000000003333377777777777333333330777033
        3333333337FFF7F3333333333000003333333333377777333333}
      NumGlyphs = 2
    end
    object bCancelar: TBitBtn
      Left = 512
      Top = 8
      Width = 110
      Height = 25
      Caption = 'Ca&ncelar'
      TabOrder = 2
      OnClick = bCancelarClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000130B0000130B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
        3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
        3333333777333777FF3333993333339993333377FF3333377FF3399993333339
        993337777FF3333377F3393999333333993337F777FF333337FF993399933333
        399377F3777FF333377F993339993333399377F33777FF33377F993333999333
        399377F333777FF3377F993333399933399377F3333777FF377F993333339993
        399377FF3333777FF7733993333339993933373FF3333777F7F3399933333399
        99333773FF3333777733339993333339933333773FFFFFF77333333999999999
        3333333777333777333333333999993333333333377777333333}
      NumGlyphs = 2
    end
    object bFechar: TBitBtn
      Left = 680
      Top = 8
      Width = 110
      Height = 25
      Caption = 'Fecha&r'
      TabOrder = 3
      OnClick = bFecharClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
        03333377777777777F333301111111110333337F333333337F33330111111111
        0333337F333333337F333301111111110333337F333333337F33330111111111
        0333337F333333337F333301111111110333337F333333337F33330111111111
        0333337F3333333F7F333301111111B10333337F333333737F33330111111111
        0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
        0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
        0333337F377777337F333301111111110333337F333333337F33330111111111
        0333337FFFFFFFFF7F3333000000000003333377777777777333}
      NumGlyphs = 2
    end
    object bImprimir: TBitBtn
      Left = 344
      Top = 8
      Width = 110
      Height = 25
      Caption = '&Imprimir'
      TabOrder = 4
      OnClick = bImprimirClick
      Glyph.Data = {
        76010000424D7601000000000000760000002800000020000000100000000100
        04000000000000010000120B0000120B00001000000000000000000000000000
        800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
        FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
        0003377777777777777308888888888888807F33333333333337088888888888
        88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
        8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
        8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
        03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
        03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
        33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
        33333337FFFF7733333333300000033333333337777773333333}
      NumGlyphs = 2
    end
  end
  object pnlProduto: TPanel
    Left = 0
    Top = 177
    Width = 747
    Height = 153
    Align = alClient
    TabOrder = 3
    object dbPro: TDBGrid
      Left = 1
      Top = 1
      Width = 745
      Height = 151
      Align = alClient
      DataSource = dtsrcProd
      TabOrder = 0
      TitleFont.Charset = DEFAULT_CHARSET
      TitleFont.Color = clWindowText
      TitleFont.Height = -11
      TitleFont.Name = 'MS Sans Serif'
      TitleFont.Style = [fsBold]
      OnColExit = dbProColExit
      Columns = <
        item
          Color = clMenu
          Expanded = False
          FieldName = 'Cod'
          ReadOnly = True
          Title.Caption = 'C'#243'digo'
          Visible = True
        end
        item
          Color = clMenu
          Expanded = False
          FieldName = 'Nome'
          ReadOnly = True
          Title.Caption = 'Descri'#231#227'o'
          Width = 370
          Visible = True
        end
        item
          Color = clMenu
          Expanded = False
          FieldName = 'SdTotal'
          ReadOnly = True
          Title.Alignment = taCenter
          Title.Caption = 'Saldo Total'
          Width = 74
          Visible = True
        end
        item
          Expanded = False
          FieldName = 'Qtde'
          Title.Alignment = taCenter
          Title.Caption = 'Quantidade'
          Width = 76
          Visible = True
        end
        item
          Color = clMenu
          Expanded = False
          FieldName = 'SdAtual'
          Font.Charset = DEFAULT_CHARSET
          Font.Color = clRed
          Font.Height = -11
          Font.Name = 'MS Sans Serif'
          Font.Style = [fsBold]
          Title.Alignment = taCenter
          Title.Caption = 'Saldo Atual'
          Width = 75
          Visible = True
        end>
    end
  end
  object sb: TStatusBar
    Left = 0
    Top = 371
    Width = 747
    Height = 19
    Panels = <
      item
        Width = 50
      end>
  end
  object dtsrcRep: TDataSource
    DataSet = REP
    Left = 16
    Top = 129
  end
  object REP: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 64
    Top = 129
    object REPNome: TStringField
      FieldName = 'Nome'
      Size = 40
    end
    object REPCod: TStringField
      FieldName = 'Cod'
      Size = 3
    end
  end
  object PRO: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 60
    Top = 285
    object PROCod: TStringField
      FieldName = 'Cod'
    end
    object PRONome: TStringField
      FieldName = 'Nome'
      Size = 40
    end
    object PROSdAtual: TFloatField
      FieldName = 'SdAtual'
    end
    object PROSdTotal: TFloatField
      FieldName = 'SdTotal'
    end
    object PROQtde: TFloatField
      FieldName = 'Qtde'
    end
  end
  object dtsrcProd: TDataSource
    DataSet = PRO
    Left = 16
    Top = 285
  end
  object RDP: TRDprint
    ImpressoraPersonalizada.NomeImpressora = 'Modelo Personalizado - (Epson)'
    ImpressoraPersonalizada.AvancaOitavos = '27 48'
    ImpressoraPersonalizada.AvancaSextos = '27 50'
    ImpressoraPersonalizada.SaltoPagina = '12'
    ImpressoraPersonalizada.TamanhoPagina = '27 67 66'
    ImpressoraPersonalizada.Negrito = '27 69'
    ImpressoraPersonalizada.Italico = '27 52'
    ImpressoraPersonalizada.Sublinhado = '27 45 49'
    ImpressoraPersonalizada.Expandido = '27 14'
    ImpressoraPersonalizada.Normal10 = '18 27 80'
    ImpressoraPersonalizada.Comprimir12 = '18 27 77'
    ImpressoraPersonalizada.Comprimir17 = '27 80 27 15'
    ImpressoraPersonalizada.Comprimir20 = '27 77 27 15'
    ImpressoraPersonalizada.Reset = '27 80 18 20 27 53 27 70 27 45 48'
    ImpressoraPersonalizada.Inicializar = '27 64'
    OpcoesPreview.PaginaZebrada = False
    OpcoesPreview.Remalina = False
    OpcoesPreview.CaptionPreview = 'Automa'#231#227'o Industrial'
    OpcoesPreview.PreviewZoom = 115
    OpcoesPreview.CorPapelPreview = clWhite
    OpcoesPreview.CorLetraPreview = clBlack
    OpcoesPreview.Preview = True
    OpcoesPreview.BotaoSetup = Ativo
    OpcoesPreview.BotaoImprimir = Ativo
    OpcoesPreview.BotaoGravar = Ativo
    OpcoesPreview.BotaoLer = Ativo
    OpcoesPreview.BotaoProcurar = Ativo
    Margens.Left = 10
    Margens.Right = 10
    Margens.Top = 10
    Margens.Bottom = 10
    Autor = Deltress
    RegistroUsuario.NomeRegistro = 'Criterius Software Ltda'
    RegistroUsuario.SerieProduto = 'SITE-0206/00125'
    RegistroUsuario.AutorizacaoKey = 'NFJL-3806-CXWK-8270-LEQC'
    About = 'RDprint 4.0a - Registrado'
    Acentuacao = Transliterate
    CaptionSetup = 'Rdprint Setup'
    TitulodoRelatorio = 'Gerado por RDprint'
    UsaGerenciadorImpr = False
    CorForm = clBtnFace
    CorFonte = clBlack
    Impressora = Epson
    Mapeamento.Strings = (
      '//--- Grafico Compativel com Windows/USB ---//'
      '//'
      'GRAFICO=GRAFICO'
      'HP=GRAFICO'
      'DESKJET=GRAFICO'
      'LASERJET=GRAFICO'
      'INKJET=GRAFICO'
      'STYLUS=GRAFICO'
      'EPL=GRAFICO'
      'USB=GRAFICO'
      '//'
      '//--- Linha Epson Matricial 9 e 24 agulhas ---//'
      '//'
      'EPSON=EPSON'
      'GENERICO=EPSON'
      'LX-300=EPSON'
      'LX-810=EPSON'
      'FX-2170=EPSON'
      'FX-1170=EPSON'
      'LQ-1170=EPSON'
      'LQ-2170=EPSON'
      'OKIDATA=EPSON'
      '//'
      '//--- Rima e Emilia ---//'
      '//'
      'RIMA=RIMA'
      'EMILIA=RIMA'
      '//'
      '//--- Linha HP/Xerox padr'#227'o PCL ---//'
      '//'
      'PCL=HP'
      '//'
      '//--- Impressoras 40 Colunas ---//'
      '//'
      'DARUMA=BOBINA'
      'SIGTRON=BOBINA'
      'SWEDA=BOBINA'
      'BEMATECH=BOBINA')
    PortaComunicacao = 'LPT1'
    MostrarProgresso = True
    TamanhoQteLinhas = 66
    TamanhoQteColunas = 80
    TamanhoQteLPP = Seis
    NumerodeCopias = 1
    FonteTamanhoPadrao = S10cpp
    FonteEstiloPadrao = []
    Orientacao = poPortrait
    OnNewPage = RDPNewPage
    Left = 308
    Top = 4
  end
  object AUX: TClientDataSet
    Aggregates = <>
    Params = <>
    Left = 276
    Top = 5
    object AUXCod: TStringField
      FieldName = 'Cod'
    end
    object AUXQtde: TFloatField
      FieldName = 'Qtde'
    end
  end
end
